home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / vnc.nasl < prev    next >
Encoding:
Text File  |  2005-03-31  |  2.2 KB  |  95 lines
  1. #
  2. # This script was written by Patrick Naubert
  3. # This is version 2.0 of this script.
  4. #
  5. # Modified by Georges Dagousset <georges.dagousset@alert4web.com> :
  6. #    - warning with the version
  7. #    - detection of other version
  8. #    - default port for single test
  9. #
  10. # See the Nessus Scripts License for details
  11. #
  12.  
  13. if(description)
  14. {
  15.  script_id(10342);
  16.  script_version ("$Revision: 1.10 $");
  17. # script_cve_id("CVE-MAP-NOMATCH");
  18.  name["english"] = "Check for VNC";
  19.  name["francais"] = "Check for VNC";
  20.  script_name(english:name["english"], francais:name["francais"]);
  21.  
  22.  desc["english"] = "
  23. The remote server is running VNC.
  24. VNC permits a console to be displayed remotely.
  25.  
  26. Solution: Disable VNC access from the network by 
  27. using a firewall, or stop VNC service if not needed.
  28.  
  29. Risk factor : Medium";
  30.  
  31.  
  32.  
  33.  desc["francais"] = "
  34. Le serveur distant fait tourner VNC.
  35. VNC permet d'acceder la console a distance.
  36.  
  37. Solution: ProtΘgez l'accΦs α VNC grace α un firewall,
  38. ou arretez le service VNC si il n'est pas desire.
  39.  
  40. Facteur de risque : Moyen";
  41.  
  42.  
  43.  script_description(english:desc["english"], francais:desc["francais"]);
  44.  
  45.  summary["english"] = "Checks for VNC";
  46.  summary["francais"] = "VΘrifie la prΘsence de VNC";
  47.  
  48.  script_summary(english:summary["english"],
  49. francais:summary["francais"]);
  50.  
  51.  script_category(ACT_GATHER_INFO);
  52.  
  53.  
  54.  script_copyright(english:"This script is Copyright (C) 2000 Patrick Naubert",
  55.                 francais:"Ce script est Copyright (C) 2000 Patrick Naubert");
  56.  family["english"] = "Backdoors";
  57.  family["francais"] = "Backdoors";
  58.  script_family(english:family["english"], francais:family["francais"]);
  59.  script_dependencie("find_service.nes");
  60.  script_require_ports("Services/vnc", 5900, 5901, 5902);
  61.  exit(0);
  62. }
  63.  
  64. #
  65. # The script code starts here
  66. #
  67.  
  68. function probe(port)
  69. {
  70.  if(get_port_state(port))
  71.  {
  72.   soc = open_sock_tcp(port);
  73.   if(soc)
  74.   {
  75.    r = recv_line(socket:soc, length:1024);
  76.    version = egrep(pattern:"^RFB 00[0-9]\.00[0-9]",string:r);
  77.    if(version)
  78.    {
  79.       security_warning(port);
  80.       security_warning(port:port, data:string("Version of VNC Protocol is: ",version));
  81.    }
  82.    close(soc);
  83.   }
  84.  }
  85. }
  86.  
  87. port = get_kb_item("Services/vnc");
  88. if(port)probe(port:port);
  89. else
  90. {
  91.  for (port=5900; port <= 5902; port = port+1) {
  92.   probe(port:port);
  93.  }
  94. }
  95.